LP ES 


PIO VO 


NO 


WO III NS TZ 


De 


INPOAMACION 
Suena El CLUB 


La integración en la asociación C.E.1.0.L. se hace por suscripción anual o semestral. 
El C.E£.1.0.L. publica xensualuente el boletin de los socios, Plave, nombre por el cual 
también se conoce al Club. 

Nas informsción sctire la asociación se puede obtener desde la secretaria del Club. 

Para ser mieñbro de Olave se requiere estar interesado fer el ordenador personal 
Sinclair BL. 

El Club mantiene una libreria de Software. Una lista de los programas existentes en 
la libreria se publicará de vez en cuando para asi ir actualizánduia. Los programas que se 
quieran aportar o sacar de la libreria se deben notificar directazónte al encargado de la 
sisna. 

Las contribuciones a Olave enviadlas a nombre del Presidente. 


Presidente Secretario Librero 

Seratin Olcoz Juan Palacio Angel Ásin 
Baltasar Gración 21 Pedro M. Ric, 12 San Jorge 22, 38 
SMS ZARAGOZA 5848 ZARAGOZA 5881 ZARAGOZA 


La correspundencia debe envarse a: Olave / Apartdo correos 493 / 58996 - Zaragoza 


Contribuciones a Olave 


Las contribuciones a Ulave deben ser Archivos de QUÍLL er cartuchos de microdrive, 
preferiblenente. Los cartuchos se devuelven a vuelta de Correo, 

Los programas cuya extensión no sea muy grande se incluirán en la revísta, pero 
aquellos de gran extensión pasarán a formar parte de la libreria. 

Los prograzas que envieis deben adjuntar una descripciba de los mismos y de. su 
funcionamiento. 


DTTDTADSDOS RO REISILASIDIII DIC ETRE ERRRDACIDII DI CICIi 2 ciREIIZZZS 


Se prohibe la reproducción total o parcial del contenido de esta revista 


Slave no se hace responsable del contenido de Jos articulos O comentarios que 
aparezcan firmados por sus correspondientes sutores. 


Siaclair, 9L, QDOS, 2X microdrive son marcas registradas de Sinclair Research Ltd, 
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EUITORIAL 


Coma ya es casi habitual en las editoriales vuelvo a deciros que no ha habido piaguna 
eoticia del Gobierno Civil sobre los estatutos, 


Siguiendo con las malas noticias y cono ya declanos en un flash de tltiea hora en el 
pasado sbuero de ALave, la revista mensual OL USER se ha incorporada a BL WORLD, La 
enpresa que publicaba BL USER era EMAP Publications y la que la ha comprado ha sido Focus 
Investuents Ltd. 


Y la noticia bomba para los seguidores de Sinclair en general y de este boletin en 
particular : 


La compra de SINCLAIR RESEARCH Ltd. por la cospetencia : AMSTRAD, de la que damos 


aeplia inforaación en un articulo dedicado a ello exclusivamente, 


En INVESTRONICA me confirmaron esta noticia el mes pasado asi como desaintieron el 
rumor de que fuese INDESCOMP quien se encargase de la importación, para España, de los 
productos Sinclair a partir de ahora, por lo menos por un año (segáa dijeron aunque ... ), 


les nds no hay ninguna intención por parte de INVESTROMICA de importar nada en 
absoluto de hardware para el OL y quizá importen software aunque es poco probable. Tambibs 
se dijeron que las conversaciones cor QJUMP Ltd. son agua de borrajas, desgraciadamente 
para los usuarios del QL españoles. 


Sin exbargo, INVESTRONICA justo con los colegios de arquitectos ha promocionado el QL 
y el suftuare desarrollado gara el mismo con fines de : Redaccióa de proyectos,Cálculo de 
estructuras e instalaciones para edificación, en Madrid, Euzkadi, Mavarra, La Rioja , 
Burgos, y en próximamente en varios Jugares ras, 


Debo nuevamente pedir a todos los socios que se envibis colaboraciones para 
publicarlas en próximos náxeros de Qlave , a ser posible en ficheros de QUILL en cartuchos 
sen dicos de 3.5", ya que son y deben ser la clave de Olave,i ánino que no decaiga el 
interds 1, 


Serafin Olcoz 
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EOMENTAGNO Da 
á AADERAMAS 
PROGRAMA : <i Microdrive ToolKit 
. EDITOR ; COMPUARE 
DIRECCION : 57 Repton Drive, Haslington, Creme, CVI 1SA 


PRECIO : 9,99 £ 


Antes que nada debo aclarar que Tooikit significa herramienta y que por eso hay 
duchos comandos toolkit en el mercado, no confundir el mdv Toolkit de Compuware con el de 
Sinclair / Qlurp. 

Una vez aclarado lo referente al nombre, decir que la versión que se comenta es la 
1,00 1 12 de Septieti»e de 1985 ). 

El prograza se cresenta en un microdrive junto con dos folios 1 ROJOS ) de 
instrucciones, ¿"ese*“ados en formato cuartilla tipo QLave. 

Los prográvras que contiene el microdrive son: 


Boot - Un simple programa que carga el Toolkit 
mikit_bin - El código objeto del Toolkit 
backup - Un prograwa para hacer copias de seguridad 


read_beaders  - Un programa ejemplo para leer cabeceras 

read_té_s bon - Ejemplo de la lectura de un sector en la memoria de la pantalla 
verity_n_read - Ejemplo de leer un sector y verificarlo 

write_a_sector - Ejemplo de escribir un sector 


El rontenido de este cartucho permite realizar el "formateo * de un cartucho con un 
especifico nánero aleatorio en la cabecera, Jeer la cabezera le un sector y devolver en la 
pantalla el noebre del medio que se ha leido y el nénero variable de la cabecera, Jeer un 
sector absoluto, verificar sectores absolutos, escrit: sectores absolutos, y escribir 
sectores absolutos sin verificación, 

En las instrucciones se dan unas claras explicaciones de como realizar las 
prestaciones arriba indicadas, asi como una referencia Buy util de como es el tornato de 
los microdrives | sectores, cabeceras de sectores, xapa de sectores, archivos, el 
directorio, y localizacids de un sector ). 


El Arico ccuerdo q.e ro tiene vo e; eno 2% 
encargado 
en el ver 


realmente, 
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Coma se puede ver por el costenido de este prozraza se ve claramente que nc se trata 
de usa berrasierta destisada precisarerte para los principiantes ya que son necesarios 
elcurcs conocirientos sobre el forzato de los microdrives asi coso sobre la forma de 
almacenar los ficheres en los cartuchos para poder sacarle el jugo a estas utilidades, 

Pealuente se trata de en TOGLKIT muy util y con muy buenas aplicaciones sobre todo 
teniendo er cuerta que a todas las ctilidades se arcede desde el SUPERBASIC, 

El £nico problems, que ns se dete a Compuware, es el posible mal uso de este toolkit 
enterdierdo por 32) uso el dedicado a la desprotección de programas coserciales ya que 
algunes presentan tnicamente la protección del núsero aleatorio y del nombre del medio 
que van en la cabecera del sector. 

Que 335 docir excepto que todas las funciones que aparecen en el toolkit son del todo 


necesarias para cualquier usuario con algunos conocimientos y con interés en internarse en 
su fl. 


PROGRAMA: MON 
EBITOR: QIUAP 
DIRECCION: 24 KING STREET RAMPTON CAMBS CB4 48D ENGLAND 


Este es un programa desarrollado por Tony Tebby (creador del 8D0S) y por lo tanto 
intimamente ligado con ej 9DOS en su forma de trabajar. 

El paquete consta de cuatro programas principalmente QMON que es el programa 
princisal y que sirve para la corcección de errores de los programas en ensamblador; QMIN 
unz versión reducida del anterior; JOB que es un +ichero de extensiones del Superbasic 
para control de jobs desde éste y CLOCXS que es ldgicamente un reloj. 


Los comandos de que consta el programa se pueden agrupar de la siguiente forma; un 
grupc dedicado a la ejecución y trace del prograsa objeto, asi con 60 podremos ejecutar 
un programa hasta un determinado lugar que hayawos marcado con un BREAKPOINT que como su 
rombre indica es un punto de ruptura en el que el control retorna al usuario esta 
eseccción se puede realizar desde usa determinada dirección, hasta un breakpoint en otra, 
basta un breakgcint o una condición especiticada o hasta return. 

El corando TRACE posee la capacidad de mostrarnos los efectos de cada instrucción en 
código objeto sobre los registros del micro posee las mismas variantes que las indicadas 
para el comando 60 Ibreakpoint, condición, return...) si bien el breakpoint que reconoce 
este cozando es distinto del de 69 por lo que no hay conflicto entre ambos. Existe una 
sodalidad de Este comando, EUICK trace que hace eso urna pasada a través del código. La 
ejecución el TRACE se puede hacer en dos niveles,sólo el código en modo usuario o también 
el código en supervisor. 

Estas opciones de trace sólo se pueden ejecutar hacia adelante lógicamente as! en el 

1 raso de que deseemos ver los anteriores se ha preparado un buffer especial que se invoca 
con el cozando RS, recall, asi poderos acceder a los pasos anteriores sin volver sobre 
nuestros pash5, 


Otro arupo de cozarndos se refieren al display en pantalla tanto en Hexadecimal y 
ASCII coro zostrando las instrucciones desensambladas o los registros del micro. 
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Un tercer bloque de comandos tratan la modificación sé registros y semcria asl Como 
la edición de dsta última, destacar de esta opción la facilidad con que ADS MOVEMOS 
*scbre la nenoría* pudiendo alterar su contenido con gran facil!“ad. 


Terenos asi nismo los comandos de búsqueda de cadenas de simbolos o bytes e incluso 
Cadenas en una instrucción. Cosandos de apertura y cierre de canales, asi como de 
evaluación de una dirección en hex y decimal. Es posible también crear 
sacro-instrucciones que se definen mediante CS y que posee también diversos modos de 
ejecución. 


El programa se carga en memoria mediante LRUN MBYI_QMON y no comienza su ejecución 
hasta que es invocado tecleando NON. Ver que el job puede ser llamado bien desde el 
Superbasic o bien desde, tro job cor lo que QNON se convierte en un job "hijo de éste 
último con todas ”»s implicaciones que esto conlleva (1 desaparecer si lo hace el job que 
lo invocó ...). La llamada se puede hacer de un modo simple o no asi es posible teclear 
QNON simplemente ccn lo que se entra en la ventana 0 y cobre el Superbasic por defecto 
OMON A2,2 monitoriza el job 3 en la ventana 2, AMON CON_256x7020x0,1 trabaja sobre el job 
0 en una ventana te reducidas dimensiones, QNON mdvi_clocks sjtda éste progama para 5er 
analizado en la vertana 1 y por tin QNON Oñadvi_clorks <cic:z mdvi_clocks de forma 
transitoria en la ventana 0 que retorna asu contenido pig tras la ejecución del 
comando. Existen 5 lineas de ventanas transitorias que “:eltr ser usadas en cualquier 
sonento. 


Cuando se iívoca el QMON Aste redirecciona el vector de excepciones del micro de 
Horaa que el QBOS pasa el control a QNON cuando éstas ocurren, en el caso de que el job 
sobre el que se trabaje tenga un vector de excepciones, aoraalmente se copia por QMON de 
esta forma en el caso de producirse un error fatal se nos advierte com un mensaje por 
pantalla. En cualquier momento Se puede interrumpir la ejecución de un comando pulsando 
la tecla ESC se reanuda la ejecución con ENTER. 


El proceso que se sigue es la inclusión de los BREAKPOINT es ligeramente distinto 
para el comando 60 que para el comando TRACE, asi con 60 se produce la sustitución de dos 
bytes de código objeto por la orden no legal 4AFB en el caso de TRACE el código no es 
alterado pero en cada momento se mira la lista de BREAKPOINT. 


El fichero J03S se incluye como ayuda para conocer el identificador del job que 
deseemos asalizar en un determinado momento y coloca los siguientes procedimientos 
residentes en el Q.L.: AJOB que permite la activación de un determinado job, RJOB que 
Libera al DIS de un determinado job, SPJOB permite colocar a un job con una prioridad 
distinta a la que posela, J03S que ncs da la lista de jobs que existen en este momento en 
el Q.L. 


Junto con el programa se incluye un manual bastante completo y que por regla general 
soluciona la sayer parte de las dudas que puedan surgir. 
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DISERO DE UNA SENCILLA TARJETA DE ENTRADAS Y SALIDAS PARA El "QL” 


J.M. Angulo, J. Parra y K. Bañuelos 


INTRODUCCION 


Con objeto de potenciar al microprocesador Gl y poderlo destinar a diversas 
aplicaciones de control industrial, se ha diseñado en el Departamento de Arquitectura de 
Ordenadores de la Facultad de Informática de la Universidad de Deusto, una simple tarjeta, 
basada en un VIA 6522, para la adaptacida de periféricos, 


El VIA es un circuito integrado usado en las familias de los microprocesadores de 8 
bits 688% y 5508, que dispone de dos puertas, de 8 lineas cada una, para el acoplamiento 
de periféricos en paralelo. Además, posee una linea de entrada y salida de información en 
serie y dos corntadores-temporizadores o "tiner”. Se trata de un mbdulo de entrada y salida 
de carácter síncrono, o sea, que su funcionamiento requiere una señal de reloj, que recibe 
por la patita que lleva la denominación de E. 


MOPULOS DE EMPRADA Y SALIDA SINCRGNGS Y ASINCRONOS 


La Hamilia del 62898, entre cuyas UCP está la 68898, residente en el QL, está 
diseñada para controlar mbdulos de entrada-salida asincronos. De esta manera se alcanza 
una gran velocidad con la transferencia de información, puesto que la UCP espera a la 
finalización del trabajo del módulo, el cual comunica dicho acontecimiento, activando la 
lnea DTACK y colocándola a mivel bajo.  DTACK significa "reconocimiento de la 
transterencia de datos” (Date Transfer Ácknonledge). 


Los componentes de control de periféricos de la familia 68888, como el 68239 y el 
62981, están preparados para trabajar en modo asiacrono, con ua incremento notable de la 
velocidad, potencía y +lexibilidad. Sin embargo, hoy por hoy, estas pastillas son caras y 
de manejo complejo, motivos por los que los fabricantes del 68998 implantaron un bus 
sincrono a la UCP principal para poder manipular módulos de las familias de 
wicroprocesadores de 8 bits, que a veces son hasta 188 veces más baratas y su manejo está 
muy divulgado. 


q =--—A------ A A CI 3 A <XA 
e 


Figura 1. Estructura del VIA, que se trata de un modulo de e*tradas y salidas sincrono, 
usado en las familias 6888 y 6508, 


ESQUEMA DEL COMEXIONADO Y FUNCIONAMIENTO DE LA TARJETA 


Para que el 68889 cambie a modo de trabajo sincrono, necesita recibir un nivel activo 
por la linea VPA (Dirección válida para periférico). La circuiteria de la tarjeta a 
diseñar tendrá que originar dicha señal cada vez que le corresponda funcionar. 


El 68888 genera una señal VXA (Dirección válida de memoria), que no genera el 68809, 


por lo que tambitn la circuiteria de la tarjeta ha de crearla sediante dos flip-Hops y se 
aplica a cada una de las patitas de *selección de chip” del Y23 (051), Este circuito es el 
indicado por Motorola en el manual *1ó-bit Microprocessor Dade Manual”. 


La señal de reloj, proviene de la patita E (Enablel de la UCP y su frecuencia es un 


diciao de la del 68968. Un ciclo de E está formado por 18 ciclos del 68899, Seis con nivel 
bajo y cuatro con alto. 
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Figura 2. Esqueña de conexionado de la tarjeta que adopte un VIA al AL. 


Un problema particular que presenta el microorderador % consiste es la presencia de 
una ULA de video, de disezo propio de SINCLAIR y que soporta diversas funciones. Una de 
ellas es confircar un DTACK cuando. su lógica interna establece que es necesario. Esta 
torza de trabajo dificulta enoracnente el funcionaajento de la tarjeta, puesto que DTACK 


manda ura señal DSMCL, que es particular del 6l y que inhabilita la ULA. Esta señal ha de 
ses m, rápida e interna, razofes por las que se ha empleado un transistor en su 
gereracito. 


Las fases de funcionamiento del VIA de la tarjeta, es un ciclo de transferencia de 
datos serían las siguientes! 


1.- EL procesador 68302 comienza un ciclo normal de lectura escritura esperando la 
activación de la señal DIACK. 


2.- En Su fugar se recibe la señal VPA, generado por la circuiteria de la tarjeta VIA 


a  _———_ 


3.- La UCP vigila la señal E hasta que pase a baja. 
4.- La circuiterla de la tarjeta genera la seral NA. 
5.- El periférico espera a que E suba el nivel lógico y entonces transtiere los datos 


6.- La UCP espera a que baje de nuevo E, Jo que significa el tin de la transferencia. 


7.- El procesador desactiva AS y DS. 


8.- La circuiterla de la tarjeta desactiva YNA y UPA. 


9.- Comienza el ciclo siguiente. 


Tasto la programación como el manejo del VIA se realiza ¿srmalmente. La base del 
direccionamientce del VIA corresponde a la posición $C8998, que se cargará en uno de los 
registros de direcciones del 68988, lo que simpliticará el manejo de 
internos del VIA, a base de desplazamientos sobre dicha base. 


los registros 
FFEFF 


Figura 3, Mapa de la memoria del 0. EXPANSION 1/0 
coboo 


La base de direcciones del VIA es $C8898 E TS 
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TRUCCOIONES DEL 48839 111) 


INSTRUCCIONES ARTTYETICAS (Cont.) 
-NEG 


Resta el operando destino de cero, El resultado se almacena en el destino. De esta 
fcrza se obtiene el cosplemento a 2 del destino [v. Blave núm. 1). 

Atvite longitudes de operando de 8,16,32 bits, y puede indicarse utilizando los nodos 
de direccionamiento: 


INSTRUCCION — NEG 
Kodos posibles op. fuente op. destino 


Pez. datos directo A 
Reg. direc. directo 

Reg. direc. indirecto 

Rez. indirecto con postincs. 
feg. indirecto cos predecr. 
Pez. indirecto con desplaz. 
eg. indirecto indexado. 
Absoluto corto 

Absoluto largo 

Relat. cont. prograsa con despl 
Relat. cont. prograza indexado 
Insediato 


AAA 


Ej? NEG.B DS 


El ejesplo calcula el complemento a 2 del byte de menos peso de D5, y lo almacena 
tamdién en el misxo byte de renos peso de 05. 
los flazs del registro de estado se alteran igual que con la instrucción SUB. 
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-NEGX 


Resta entre el contenido del operando destino y el valor del flag X de cero. El 
resultado se alracena en destino. 

Los flags del registro de estado se alteran igual que cor la instrucción SUBX. 

Es igual que NEG, salvo que elconterido del flag X también se resta de 9, lo que sirve 
pasa trabajar con precisiba múltiple ( Z pasaa 9 sí el resultado es $, pero en caso 
contrario no cambia de estado, lo que permite cosprobar el resultado en operaciones de 
edltiple precisión). 

Puede trabajar co”. aperandos de 8,15 y 32 bits, y adsite Jos mismos modos de 
direccionamiento que N£G. 


-NBCD 


Esta instrucción resta el operando destino y el bit X de 2, *ilizando aritmética BCD 
(v. filave nóm. 11, Almacena el resultado en el destino. Lo que se consigue cos NECD es 
el complemento a 18 del destino cuando X=8 y el complemento a 9 si X=1. 


Peruite los tisws totes de direccionamiento que la instsucción MEG. 
El tamaño de operando es sieapre | byte. 


--Alteraciones de los flags. 

'C* y Y se ponen a*i* sise produces llevadas en la operación, y aÑ en caso 
contrario. 

17* Se pone a *9” s el resultado no es cero, y si lo es NO CAMBIA 

'N? 7 *V? Quedan indefinidos. 


-MULU 


Usando aritebtica binaria, multiplica dos numeros sin si3no. 
El tamaño de los operandos es de 15 bits, y el del resaltado, de 32. 


Los flags " , Cestán siempre a cero, independientesente de lo que ocurra en el 
operaciba 'N” reflega el bit más significativo del resultado; *2” pasa a*'1” siel 
resultado es 9 y a *8* en caso contrario; *'X' no se altera. 


Uno de los niaeros a ujtiplicar debe facilitarse en un registro de datos, y hará a Su 
vez de operardo destino; el otro operando puede facilitarse usando: 
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INSTRUCCION — MULU 


Hodos posibles op. fuente op. destino 


Reg. datos directo Xx Xx 
Reg. direc. directo 

Reg. direc. indirecto 

Reg. indirecto con postiacr. 
Reg. indirecto con predecr. 
Reg. indirecto con desplaz. 
Reg. indirecto indexado. 
Absoluto corto 

Absoluto largo 

Refat. cont. programa con despl 
Relat. cont. programa indexado 
Inmediato 


> OA 


-MULS 


Multiplica también dos operandos de 16 bits, produciendo un resultado de 32 que se 
almacena en el operando destino. Es pues idéntica a MULU, salvo que MULS trabaja con 
números con signo usando aritmética binaria en complementa a 2 tv. Olave núm 1). 


Los modos de direccionamiento posibles son los mismos que para NULU, 


--Alteraciones de los flags 

*N' Se pone a "l* si el resultado es negativo; se pone a *S" si es positivo. 

"2" Pasa a nivel *1” al producirse como resultado 4; en caso contrario pasa a “8. 
*Y" y *C? Permanecen siempre a 3. 

'X' No se altera. 


-DIVU 


Divide los 32 bits de un registro de datos entre un operando fuente de 16 bits. El 
resultado se almacena en el registro de datos destino tel cociente en los 16 bits de 
menO5 peso y el resto en los de nds peso). 


Los nados de direccionamiento posibles son los aisaos que para la instrucción MULU. 


--Alteración de los flags 

*N* Repite el bit más significativo del cociente. Si se produce un desbordamiento queda 
en estado desconocido, 

*7* Se pone a *1" si el cociente es $ ya *S” si el cociente no es $. Sí se produce un 
desbordamiento queda es estado desconocido. 

*C* Permanece a 8 

*X' No se afecta. 

*Y* Se pone a *1” al producirse un desbordamiento. 
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(Se produce desbordanierto cuando el operando fuente es mayor que el destino, £l 
desbordamiento se detecta antes de realizar la operación, y en caso de originarse, no se 
lleva a cabo la operación y por tanto los operandos no casdian. Los flags se alteran 
según se ha expuesto cuando se produce desbordamiento) 


-DIVS 


Opera igual Gr la instrucción DIVU, salvo quue la operación se jlevaa cabo en 
aritebtica sin signo. 


Los modos de direccionamieto posibles son los mismos que los permitidos en la 
instrucción MULU, 


Los 32 bits del resultado están compuestos de igual forsa que en la instrucción DIYU 
Mos 16 de wenos peso tornan el cociente, y los 16 de más peso ei resto), y se almacenan 
también en el registro de datos destino (el que proporcuona el dividendo). 


--Alteración de tos $lags. 

%M' Pasa a "1" si el cociente es negativo y en caso contrario pasa a *9” 
Si se produce desbordamiento queda en estado indefinido. 

>2" Se pone a *1” si el cociente es 9 y a "9” si el cociente no es cero. 
Si se produce destordamiento queda en estado indefinido, 

*Y' Al prodacirse un desbordamiento pasa a nivel "1” 

>C* Siempre a *8* 

*X' No se altera. 

-EXT 


Produce la extensión de signo (repetición del bit de más peso), del operando, 
pasándolo de byte a palabra o de palabra a palabra larga, según sea el caso. 


Ej: EXT.W D2 

En el ejemplo se extienden en signo los 3 primeros bits de D2, hasta completar la 
palabra 11é primeros bits), por funcionar con una longitud de una palabra (VW). Si el 
tamaño del operscto es le palabra larga, el bit 15 del registro de datos implicado, se 
extiende hasta el 31, 

El operando tiene que estar contenido siempre en un registro de datos. 
--Alteración de los flags. 
"NY" Se pone a "1" si el resultado es un número negativo tel bit a extender ="1')3 en 


caso contrario pasa a “Y”. 
7” Pasa a nivel "1" si el resultado es $ y viceversa, 


€_ A __—_o  .. 2 


1 y 0” siempre a E 
*X” no se altera, 


-CLR 


Borra el operando especificado (lo ilena de ceros). El tamaño del operando puede ser 


de 8, 16 B 32 bits. 


“Alteración de los flags. 


*7' Pasa siempre a *1* 


"NW, "NW y *C* pasan siempre a B. 


*X” no se altera, 


Los modos de direccionasiento posibles para indicar el operando que queremos borrar 


Reg. 
Reg. 
Reg. 
Reg. 
Reg. 
Reg. 
Reg. 


Absoluto corto 
Absoluto largo 


INSTRUCCION — CLR 
Modos posibles op. tuente Op. destino 


datos directo Xx 
direc. directo 

direc. indirecto 
indirecto con postincr. 
indirecto con predecr. 
indirecto con desplaz. 
indirecto indexado, 


-AARAAA 


Relat. cont. programa con despl. 
Relat. cont. programa indexado 
Insediato 


-CMP 


Esta operación resta dos datos, reflejando el resultado de la resta en los flags del 


registro de estado. 


Dicho con otras palabras, lo que hace es comparar los dos operandos. 


El operando destino es siempre un reg. de datos y hace las veces de minuendo. 
Los modos de direccionamiento posibles son: 


Reg. 
Reg. 


INSTRUCCION — CMP 


Modos posibles Op. fuente Op. destino 
tatos directo Xx Xx 
direc. directo x 


a  €EE  A 
a _ xx - Í--iz=E - == <K<AAKA<AA<K<á—á]á]_-<áK a  Íaqa == 


Pp —mmpn————— 
Reg. direc. indirecto 
Reg. indirecto con postiacr. 
Reg. indirecto con predecr. 
Peg. indirecto con desplaz. 
Reg. indirecto indexado. 
isc!.lo corto 
ibsoluto largo 
Relat. cont. prograsa con despl, 
elat. cont. programa indexado 
Inmediato 


A AAA A ss 


los flags del registro de estado se alteran de la misma +orma que en la instrucción 
curp. 

La diferencia agtre CRPA y CMP estriba en que CMPA sálo puede usar tamaños de operando 
de ló y 32 bits, =ierntras que CKP podía hacerlo con operandos de 3,26 y 32. 


-CMPI 


Variante de la inst-ucción CMP que resta del operando destino (expresado Con 
direccionamiento inmediato en la misma instrucción) el operando fuente, reflejando el 
resultado de dicha operación en los flags de estado. Dicho de otro modo, compara un dato 
inmediato con otro alwacenado en un registro de datos o en la menoria. 

Los modos de direccioramiento posibles son; 


INSTRUCCION — CMP1 
Modos posibles 0p. tuente op. destino 


Reg. datos directo Xx 
Pez. direc. directo 

Res. divec. indirecto 

Rea. indirecto con postiace. 

Reg. indirecto con predecr. 

Re3. indirecto con desplaz. 

Reg. indirecto indexado, 

Absoluto corta 

Absoluto largo 

Relat. cont. programa con despl. 

Retat. cont. programa indexado 

Insediato Xx 


>= mmm 


£l tamaño de Ojerando puede ser byte, palabra o palabra larga. 
Los ¿$lags reflejan el resultado de la comparación de igual modo que en la instrucción 
CH. 


€ _ -——— a  _ —_— == 


En la siguiente tabla aparecen los valores de los flags del registro de estado, segán 
haya sida el resultado de la resta: 


CONDICIONES FLAGS 
Ñ 2 t 
destino > Fuente s l] , 
Destino € Fuente 1 8 
Destino = Fuente l] 1 L] 
-CMPA 


Es un caso particular de la instrucción CMP. En CMPA, el registro destino es un 
registro de direcciones. Al igual que en CMP, tambita se lleva a cabo la resta entre los 
dos operandos y se alteran los flags, de acuerdo con el resultado. 

Asi pues los modos de direccionasiento permitidos son: 


INSTRUCCION — CHPA 
Modos posibles op. tuente op. destino 


Reg. datos directo 

Reg. direc. directo 

Reg. direc. indirecto 

Reg. indirecto con postincr. 
Reg. indirecto cor predecr. 
Reg» indirecto con desplaz. 
Reg. indirecto indexado. 
fbsoluto corto 

Absoluto largo 

Relat. cont. prograsa con despi. 
Relat. cont. programa indexado 
Inrediato 


AAA AAA As 


A - -18- 


conaeo 08 Los 
S10 Al OS 


4 
f 


dl 


Por si a alguien pudiera interesarle, a continuación van un par de posiciones de 
aenoria bastante btiles al encabezar un programa! 


ros 
PEEX (163898) = 1 si se está en T.V. y U si se está en sonitor. 


PEEX 11638921 = 8 sí se está en mode 6 y 8 si se está en mode 8. 


Enrique José Sanchis Borrel 
ALICANTE 


Coneti un bug en el articulo sobre WHEN (Número 3, pag. 26) dice: 


b) brx-1 : 5=SQRT(x-1) 
deberta decir: 
Db) bex-1 1 D=SORTIB). 


José M. Guzuán 
SEVILLA 


Cuando se sale de las progrmas de Psion y se intenta editar algún programa de basic, 
en mi versiba de programas y de 0.L. no se imprime la linea a editar. Todavia no tengo muy 
claras las razones pero la soluciba es sencilla: en los programas boot eliminar en la 
línea en que se abren los canales 9, 1 y 2 la apertura del canal $. 

Si se borra esto todo funciona ¡igual y además se editan las lineas de los programas 
Basic. 


E. de Jesds 
Respecto a la posibilid 14 de conocer la memoria libre en el B.L. esto se calcula por 


diferencia de dos “2riat!es del sistema SY_BAS y SU_FREE: 
print peek_11153855) -peek_1 (143852) 


Wave 
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NOVEDAD E 


WDSoftware : 


HILLTOP 

St. Mary 

JERSEY 

Channel Islands 
Tel: 10534991392 


Lista de precios de ABRIL Peso Precio R Contenido 
Tten Kgr. (Sin 1YA) 

BSTLAUTOTRELZERERELLRE ADS E EE ZE EL ZE ZE CE SLCIDO RE NEZEZZZZZEZERIDES EE REZUERZZIERLDTLERAR 

HARDVARE 

Sinclair QL + Hanual 2,000 173.87 Versiós Británica 

Sinclair 0L (512 K) 7.000 292.61 OL + Silicon Express 

Microvitec BL RGB Monitor T/S 13,000 239.13 B5-Col 

CST Q-Disc Interface «350 75,00 Controla 2 Drives 

CUMANA CAO70 Disc Interface 350 69.48 Controla 4 Drives 

CUNANA 05354 1 x d/s 3.5" drive 2.500 121.70 Fuente Propia, 720k 

CUNANA CS400 1 x d/s BO tr 5.25" dr 2,900 156,48 E 2, 720K 

CUMANA CD338 2 x dí/s 3.5 * drive 3.500 210.00 al * 14.4 

CUMANA CDGO0/S 2 x d/s 5.25 * dr 3.900 295,61 , * 5,14 

NIRACLE Sys 312 ExpandeRAM .220 125.00 Doble Slot 

CST 9+4 Expansion Systen 5.000 200.00 

CST JEEE-483 Interface 195.00 — Para Standard(GPID)Bus 

CST 20Mb Winchester+dual 3.5* Disc 1000.00 Completo con Intertace 

OL -Centronics para Impresora .250 26.04 

Miracle Sys Modaptor para Modens 150 33.9 

Miracle Sys Joystick Adaptador «030 4.97 

Eidersoft ICE .350 52.13 ROM con VIMPs/multitarea! 

RilMist/ART/Too1kit 


PP 


A A — A 


er 0 E 


SOFTUARE 

Doctor Cartucho Talent 080 19.09 Recupera archivos perdidos 
Graphi0L Talent .280 30.39 Paquete de Diseño Gráfico 
OL Project Planner Triptych .850 34,74 

OL Entrepreneur ar ,900 34,74 

BL Decision Maker es 900 34,74 

AL Contabilidad Integrada Sagesoft 1.100 78.22 

BCPL Netacosco «55 52,13 

150 Pascal Netaconco 700 78.22 

Compilador € Metaconco 750 36.91 

Psientific OL Keydesine »040 8.65 Hasta 2000 carac. por Key 
ARCHIVER Eldersott 200 16,48 

BSPELL «q .1% 17.35 

QL JARDINERO Gordian 280 21.70 Datos sobre 1100 especies 
Dialog Transact .250 30.39 

Tasprint para GL Tasman 250 17,35 

Tascopy  ” , .259 11,22 

AL Toolkit Sinclair .7% 21.70 Extensiba de Comandos Basic 
BL Cajero QUEST 1,000 60.93 


a ——— 5 PP 
A ———————— 


J30S5 | JOYSTICK - OPERATED SOFTNARE Systen ) 


Es el datertace entre el Usuario y el 9305, el potente sistema oprativo del OL. Como 
sistenas similares en abquinas más caras, J0SS libera al usuario del tedioso trabajo de 
escribir largos ficheros de comandos, o ambiguos iconos. Con las teclas del CURSOR D con 
JOYSTICK, se mueve el cursor sobre el comando requerido yse pulsa la barra de Espaciado o 
el Fuego para seleccionar la opción. 


15h en adv o 5 1/4" $1p, 17 hen 3.5 * $1p 


REFBL? 


Para usar com ARCHIVE 2, contiene 1300 Gtiles referencias y un programa de 
busqueda/escritura. 


11 hen adv 0 3.5* $1p, 9 A en 5 1/4 $1p 


Y) TUTOR de MORSE 


óN en adv o 5 1/4 *,8Rena.5" . 
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El pago se debe hacer por adelantado en Rh Esterlinas en Bancos Dritánicos,Giro 
Internaciona], Postal Order o ACCESS/Mastertard. Añadir 1R para el correo abren fuera de 
Europa. 

El 1VA no se cobra de ello se encarga la Aduana). 

Añadir 4.65 R si no sobrepasa 1/2 Kg,añadir por 1/2 kg .55,si no pasa el kg 4.60, si 
ao pasa 2 k95.70, 3 kg 6.75, 4 kg 7.70 ,5 kg 8.30, 6 kg 9.60, 7 kg 10.30, 8 kg 10.75, 9 
kg 11.20, 10 kg 11.49, 


BOALOX 


INFORMATICA, 
SOFTWARE PARA  QL 


SYAT.- El mas completo y versátil paquete de programas de cálculo estadlstico. Tres 
sodos distintos de introducción de datos. Capaz de efectuar análisis seriados, con un alto 
nivel de automatización, de matrices de datos con Mitíples obser, acíones par cada sujeto, 
y con parte de sus valores en blanco. Estadistica de dos variables, con Jistados, 
rsultados y representaciones gráficas (histogramas en 30 y gráfico de nube de puntos) con 
salida por pantalla y por impresora, Incluye programas-herramienta para modificar y 
combinar datos, conversión de unidades directas a derivadas (tipicas, percentiles) con 
representación gráfica, por pantalla o impresora. Correlación parcial y miltiple (can 3 y 
5 variables). Con un amplio manual que incluye explicación de los términos y técnicas 
estadisticas y con programas-ejemplo que ilustran sobre el nodo de empleo. PUP 6.908 pts. 


QLTEST.- Un Ftrtil instrumento pedagógico que permite construir +Acilmente pruebas 
objetivas de elección múltiple, con 3 a 7 respuestas posibles, para enseñanza 
individualizada o para editar rapidamente pruebas de rendimiento individuales o 
colectivas, de corrección rápida y objetiva. Con amplia documentación y varios programas 
ejemplo. PVP 3.568 pts. 


CATALOGO. - Si sus grabaciones en cartuchos de microdrive comienzan a ser dificiles de 
localizar, Vd. necesita este programa herramienta que le permitirá tener ordenados y 
facilmente localizables sus programas en BASIC, ficheros PSION y demás grabaciones. Con 
salida por pantalla e jspresora, crea relaciones ordenadas y sistemáticas de grabaciones: 
listados cosprinidos del contenido de cada cartucho, relación general de grabaciones por 
ordea alfabético, con expresión del cartucho e que está cada una, y relación alfabética de 
+ticheros PSION. Indica 1 de capacidad utilizada respecto de la total de los cartuchos 
disponibles; crea una base de datos que permite la básqueda rápida de grabaciones a carga 
del propio ordenador. Con manual de instrucciones. PVP 4.998 pts. 


A — A 
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PAEGUNTAS 


Refiriendone concretarente a los capitulos que sobre código máquina han aparecido en 
Olave resulta: mn 

£l primer Capristo tn, 1 sin páginal , está bién, perfectamente digerible. 

Donde ya se ¿43 el asunto es en el segunda capitulo (n. 2 página 18), concretamente el 
esquera de dicha pizina que no está desarrollado. 

A partir de aquí ya todo lo que se publique no sirve para nada puesto que no sabes que 
hacer con ello. 

Concretamente el lector no experimentado que es para quien se supone que va dirigido 
el tema se pierde y lo deja. 

A mi se gustaria que me aclararan lo siguiente! 


I- ¿Cuales son las instrucciones del QL para manejar el código Máquina?, ¿Como se 
entra?, ¿Como se sale?,¿Com se ejecuta?. ¿Son las instrucciones del QDOS?. ¿Son 
instrucciones de Superbasic?. Las esplicaciones deberian ir acompañadas de algún 
ejenplilio. 

2- Explicar coxo se fabrica un instrucción en código máquina y cono se la programa. A 
continuación ejemplo de algún prograsilla con alguna tarea sencilla, 

3- Mo queda claro según Jo que se dice en la citada página 18, si hay que introducir 
los datos en binaric,hexadecimal o decimal. 

Os agradecerá resolváis estas dudas en la revista, pues creo que no seré el unicoa que 
las tenga. : 


José Aramendi Lizcano 
, MADRID 
Las instruccicses que contiguran el lenguaje máquina son las reflejadas en las tablas 
que aparecen en el núsero 2. En dichas tablas figura el apabre de la instrucción, 
significado, sinta.-5 q.e admite y tamaño de operandos con que puede funcionar. 


Cono ya se explica en el núnero 2, para llevar a cabo un programa en código máquina, 
es precisa la ayuda de un programa ensanblador. La manera de ilevarlo a cabo es 
completamente distinta a cómo lo hariamos en Basic. En priser lugar, hay que confeccionar 


el listado +uente del prograza (listado con las instrucciones que 5e están explicando a 
partir del nimero 4, dispuestas para realizar la tarea, +in del programa. Como deciamos en 


el nómero 1, adexás de las instrucciones del 68899, también pueden aparecer llamadas al 
AuOS — --traps--). El listado fuente se lleva a cabo con la ayuda de un programa editor, 
que se comporta únicamente como un editor de textos. La sintaxis, respecto a columna de 
conentarios, separadores, depende en gran parte del programa ensamblador que utilicemos, y 
por tanto hay que rexitirse al rarual del mismo. Una vez elaborado el listado fuente con 
la ayuda de un egitor, se graba, y se pasa a través de un programa ensamblador. Dicho 
ensamblador prodi=i»a un Hichera que es por fin el programa en código máquina listo para 
ejecutarse en el DL. Este proceso se refleja en la fig.1, pag. 18, núm. 2. 


- 2. _— _M>—>=2>2222; 


Respecto al repertorio ds irst-tciones, éstas no tienen nada que vez con el 
Superbasic. Cada microprocesador tiene un juego de instrucciones. En el caso del 69998 
éstas son las reflejadas en las tablas del núrero 2 de Olave. Aunque parezca excesivabente 
tedioso, prograzar a hivel sáquina es esto exactamente, hablarle directamente al 
ricroprocesator del ordenador. 


£l desarrollo de cada instrucción se empieza a exponer a partir del núnro 4. 

Los datos que aparecen en el listado fuente (el que llevamos a cabo nosotros), pueden 
facilitarse en uno u Otro sistema de numeración, según el programa ensamblador que 
utilicemos. Hay algunos que permiten usar cualquiera de los tres sistemas findicando, por 
supuesto, el sistema que queremos usar). 


Asi par ejemplo, la instrucción  ADD.M $45888,D3 quiere decir: Sumar los 16 bits 
(1,4% indica un tasaño de cperando de lé bits, cowo ya se ha explicado) situados en la 
dirección de memoria $4588% --hexadecimal--  ipara la mayoria de los lenguajes 
ensambladcres, el sisbolo $ delante de un ndmero indica que éste está en hexadecimal), con 
los costenidos en el registro DS, $95888 indica una deireccibn de mero: ia, ya que no se 
indica ningún otro tipo de direccionamiento, y entonces se sobreentiende que utilizamos 
direccionamiento absoluto (V. QLave ata 3), 


No obstante, somos conscientes de que el lenguaje ensamblador, o el código máquina, 
resultan muy arduos para aquellas personas que no han oido hablar nunca de ellos. Los Ñ 
articulos que aparecen en el buletia, están enfocados, desde el supuesto de que se conocen 
basicamente los fundamentos sobre lenguajes ensambladores y estructura de 
nicroprocesadores. 

Tal ycomo aconsejamos en el núm. 1, resulta dtil el practicar con un lenguaje 
ensastlador, y a partir de unos conocimientos básicos sobre el tema (los que intentamos 
dar en la sección) ir descubriendo las posibilidades del mismo. 


Agradecerla si ne pudiesen informar sobre la existencia de un cospilador de COBOL. 
Sin uds que telicitarles por la extraordinaria labor que están llevando a cabo y 
esperando ao se desanimen y que esto dure, ne despido de Vis. 


Angel Trigueros Romero 
CASTELLON 


Lasentablenente todavía ao hay en el mercado ningás capilador de COBOL, que nosotros 
Sepanos. 

Por lo visto varios de nuestros socios sienten interds por trabajar en este lenguaje 
pero por ahora no es posible. 


Sn. _« . EE -=————4+ 

Aunque en el boletin de Harzo hay una isteresantisima información sobre los productos 
que comercializa "Compuare”, no estoy aun seguro de algunos detalles que quisiera saber 
antes de hacer mi pedido. Son los siguientes: 

1.- días expansiones de semoria 'Kiracie Expanderam' permiten insertar el 
intertaz/controlador de disco de *NicroPeripherals* - que es lo que yo tengo - o bien solo 
sirves para el de "Cumana"? 

2.- ¿Sabes que es el *Expansióa Module (Sinclair BL) power supply" ? 

3.- ¿las fundas vacias de microdrives sirven acaso para "tapar* y proteger las 
ranuras de inserción de los mismos en el QL, o son otra cosa? 

4.- En la pagina 20 del citado boletla de Marzo cuando indicáis lo que hay que 
pagar por gastos de envio para diversos artículos se hace referencia a "modems”, sin 
embargo n0 hay referencia similar en el *catálogo" de Compware reproducido en la página 
17, Mi pregunta es: ¿resulta posible,por tanto, importar modems acusticos para el QLa 
través de Conpuare y cunato valen? 

Ea otro orden de cuestiones ne atrevo a sugerir-preguntar lo siguiente; 

1.- ¿No serta interesante introducir una sección informativa sobre el hardmare 
disponible-disponíble en nuestra querida Inglaterra, claro- para el QL ? 


2.- éNo seria posible presionar a Investrósica para que se ocupe algo más del 
darduare y del software *disponible* para el OL que tanto anuncia? 

3.- ¿Tenbis algunas intenciones sobre redes locales o sobre conexion con modens 
entre los socios que quisieran?¿Es esto posible? 

4.- ¿No podriais pmblicar en el boletin los datos precisos para suscribirse a 
L'users y a OLVorid ya que aquí -que yo sepa-nadie las importa? Astonio Ramos 


Las expansiones de nenoria "Miracle ExpandeRAM” permiten insertar el intertaz de Micro 
Peripherals, comprobado en Zaragoza ,no es propaganda, 

El "Expansiba Module poner supply” se trata efectivamente de una tuente supletoria de 
energía, pero en concreto para la expansión de memoria de ExpandeRAM no es necesaria | 
Comprobado ). 

Las fundas vacias no sirven para Jo que pregunta y no entiendo el sentido de la misma. 

La respuesta es evidente despues de ver la sección de novedades del pasado más, pero 
respecto a lo publicado en la página 17 del número 3 hay que decir que se incluyen los 
sole» y sus precios en la segunda linea. 

En la sección de novedades tratamos de dar a conocer lo *disponible-disponible” para 
el OL y conste que aunque se puede entender como publicidad ao lo es, ya que no Ja 
cobrasos y la publicamos por la inforsacióa que en ella se da . 

Ko es posible presionar a INVESTROMICA y el motivo es que dicen que en España no hay 
demanda de hardnare para el OL, aunque en Olave pensemos lo contrario, 

Redes locales ya hay varias funcionando aunque so para la cowinicación entre usuarios. 
Respecto a Ja instalación de Jos modems , depende de la CTNE y de cómo se regularicen y 
aorsalicen los aodens en España, más información es próximos adneros de Blave . 

La forma de suscribirse a 0L VORLD/incorprating ÉL USER es eaviando un Cheque por 
valor de 30 ha nombre de FOCUS INVESTMENTS Ltd. cuya dirección es : 


OAKFIELD HOUSE PERRYNOUNT ROAD HAYUARDS HEATH VEST SUSSEX RH1S 31H 
Tel, 0444 459189 


nn. _ _ _ _ _  _— ==  _ _b[lEmA 
Tengo una impresora BNC, la DPIBO de matriz de puntos de impacto, y al trabajar con 
los programas Archive y Quill de OL (Psion), tengo problesas: 


1.- En el QL Archive: 

Para imprinir los caracteres 3 y ñ, de tal forua que impriman ese carácter y no 
btro, Que procedimiento puedo utilizar para que el ordenador al detectar el carkcter = lo 
inprimiera. 

2.- En el QL Quill: 
Cuando se agota la memoria del microdrive y estamos trabajando con un docusento, 
cóno podemos continuar el mismo documento. Cómo imprimir los caracteres 4 y 
3.- En el QL Easel: 
] Forma de hacer gráficos en forma de piránido. 
Carlos Sánchez Plaza 
Madrid. 


La impresora Admate DP198, posee varios juegos con caracteres locales (0,S,A, Francia, 
Alemania, Inglaterra, Dinamarca, Suiza, Italia y España). Si la impresora tiene activado 
el juego español, varian los caracteres de códigos: 35, 91, 92, 93, 123, 124 1 "5 es el 
carácter 92 y *5" el 124). 

Lo más segura es que tu impresora tenga por defecto activado el juego españolj en este 
caso, aormalmente puedes imprimir el caracter *5*, pero no puedes hacerlo desde *Quill". 
Para solucionarlo, tienes que ejecutar el programa *Install_bas”, que está en el misao 
cartucho que "Quill”. Hecho esto, selecciona la opción “EDITAR”, con lo que te aparecerán 
todos los códigos de control y posibilidades que usa “Quill” para el manejo de la 
impresora, Pues bien, basta con borrar los códigos que aparecen en “COD. PREAMB.", (el 
programa dejará la anotación "MINGUNO*), Una vez hecho esto, selecciona la opción 
instalar, y el mismo prograsa se encargará del resto. En realidad lo que has hecho es 
evitar que cada vez que *Quill* vaya a iaprimir, seleccione en la impresora el juego 
1,S.A. 

Es posible que na tengas seleccionado por defecto el juego castellano) en ente caso, 
debes cambiar los códigos que aparecen junto a "COD. PREAMB.* por *ESC.R.7", que son dos 
encargados de activar el juego castellano. 

Para conseguir que también el programa Archive imprima la ñ, debemos hacer las nisnas 
modificaciones con el programa "Install_bas* de *Quili", o "instalar" los datos en el 
cartucho de "Archive. 


Al trabajar con el programa "Quíll*, éste va grabando automáticamente el texto que 
rebasa la nenoria del QL, ocupando de éste modo el cartucho que tengamos en el microdrive 
2. Asi pues, si hemos confeccionado un texto que ocupe más de la mitad de un nicrodrive, 
*QuilI", tendrh abierto un fichero en *mdv2_? para poter trabajar cos ese texto, Si en 
estas condiciones le decimos que nos lo grabej como la opción por defecto del comando 
salvar funciona en el microdrive 2, nos encontrarenos con que ac tenemos suficiente 
espacio libre en el cartucho. En este caso basta con alterar la opción que nos ofrece por 
defecto "Quill” al ir a salvar: *edv2_* por "mávl_*, y meter en el microdrive 1 un 
cartucho formateado, De esta forma podremos trabajar cos textos de hasta 109 Kbytes 
faprox, 1, 
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Lógicamente para cargar un texto que ocupe más de la mitad de un cartucho, tenernos 
que hacerlo desde el microdrive Ll, .ya que si no alár a abrír *Quill" su fichero de 
trabajo en el microdrive 2 no encontraría espacio suficiente. 

Para trabajar con textos que superen los 148 Kbytes, es preciso hacerlo por partes ao 
superiores a dicha cifra, S 

Do todas formas no es recomendable trabajar con textos muy largos, ya que el programa 
tiene que acceder constantemente al microdrive 2, ocanionando unas pórdidas de tiempo y un 
desgaste del cartucho evitables. 

Resulta más práctico dividir los textos en fragmentos cortos y grabarlos por 
separado, Para imprimir el texto basta cos unirlos todos. Ademhs proporciona mayor 
seguridad, ya que en el caso de perder informaciba enun cartucho, podríamos llegar a 
perder todo el texto sí no lo tuvieramos troceado, 


El carácter “ en tu impresora es el carácter de código 91 del juego francés. Para 
poder imprimirlo, el QL debes activar el juego del caracteres frances y luego imprinir 
chr$191). 

Print (canal), chr$t27)]"R"pchrstidichrsi9l). 


Un sistema para conseguir imprimirlo sin mayores complicaciones puede ser el activar 
dicho fuego en la impresora (cheS(27)5*R*¡chr$(11), y cada vez que queramos inprinirlo, 
teclear en nu lugar el carácter de código 9% Cabrir paréntesis cuadradol. En este caso 
tienes que resígnarte a no poder Japrimir la *4". Para poder imprimir ambos caracteres, 
tienes que cambiar al Juego francés para imprimir y al castellano 
(ehr6(27)1"R*1chr$171) para Suprimir la *%* 


Las graficas de poblacion consisten en dos graficas, una a derecha y otra a 
izquierda (cono en la figura), esto se puede realizar en el programa EASEL metiendo 
por separado las graficas de derecha y de izquierda, y convirtiendo una de ellas en 
negativa, aediante formulas, es decir, suponiendo que una grafica 5e llamase 
*aquierda?, y que la otra se llamase *Derecha', se pondria (tras haber introducido 
les valores de ambas graficas): 

"iquierda=-Izquierda" 

Tras esto se visualiza la grafica conjunta por wedio del comando *vien” 
(visualizar) introduciendo: 

"viex*,*Izquierda,Derecha* 

y dandole tinalsente el formato numero 6. 

Despues se elige una regleta sin valores y se xeten como texto los tuyos 
propios. 

Entre los dos graficos se puede colocar texto en sodo vertical y sobre fondo 
negro para dar los valores de edades de Ja peblacion. 

Las barras, ejes, regleta, fondo, indicador etc. se pueden regular despues a 
voluntad. j 
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He podido comprobar que enel nánero 3 de BLave aparece una oferta de Sottuare y 
Hardware de la casa Cosercial Compuare, En la citada oferta se dan todas los datos para 
hacer el pedido: Precio, Gastos de envia, Denora aproximada del envio, etc. Pero he 
observado que ao se dice nada acerca de los posibles problenas relacionados cor el paso de 
la Aduana, ¿existen estos probleyas? o estos productos tienen paso libre por la Aduana. 

Ruego que me clarifiqueis esta cuestida ya que serla lamentable que us socio se 
gastara una gran cantidad de dinero en Hardware para que luego quedara retenido en la 
aduana al no venir nada indicado en la citada oferta. 


Luis José Garcia 
JAEN 


Hasta el sonento los socios que has pedido algo s Compuware lo han recibido al precio 
indicado y en el tiempo esperado. Al recoger el paquete en correos no ha surgido ningúa 
problema excepto que el paquete estaba abierto pero cos el contenido intacto y en 
pertectas condiciones, 


He cosprado una impresora Seikosha SP-800 con interface centronics acoplado al Al. 
pero no consigo que funcione correctamente. Lo hace con los pregramas de PSiON Guill, 
Fasel y Abacus aunque falla con algunos caracteres castellanos pero ao consigo que 
fenciene con Archive cuando éste es el que más me interesa. . 

Taxbido desearia que me indicaseis el modo de obtener COPYS de pantal:a. 


Jose Miquel Alvarez Torregrosa 
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En el casc de que tergas un Q.L. castellano la obtención del conjento de caracteres 
castellanos es sercillo, sólo has de incluir el couando TRAL. En el caso de que poseas el 
rodelo inglés has de realizar correctasente el install de los programas de Psich, Liénes 
ura descripción completa del sótala a seguir en la sección de izforaacion del manual. 
Deberás de ejecutar el prograza install_bas y selecciorar uóa impresora cualquiera enla 
que cclocarás los datos de tu impresora, los baudios a 9600, supriair el código silo 
habiere as! como el de postámbulo, rellenando las opciones de negrilla... Para colocar 
los caracteres castellanos lo debes hacer con las opciones traducir hay 10) colocando 
prixera el caracter a transfersar del set del 9.L. y a contincación el que correspenda en 
tu izpresora io.) 

Una vez realizada esta instalación por ejemplo en el cartucho de duill debes colocar en 
el náv2 el Archive e instalar en el mdv2 en respuesta a las preguntas del programa. 

Para la chterción de CCPYS de pantalla te resitizos al prograna en ensamblador publicado 
en el bcletin rus. 4. 


lave. 


¿Qua marcas y modelos de ampliaciones de aenoria y floppis se conocen en el sercado? 
¿Cuales tienen posibilidad de conectar el +loppy a la arpliación? 

¿Se puede conectar cualquier 4loppy a cualquier ampliación que disponga de conector? 
¿Es posible encontrar en el mercado esp. estos productos? 

¿si se piden a U.K. cuanto habria que suzar al coste que alli tienen? 


¿Existen ampliacienes compatibles Con el fIcppy oficial presentado por INVESTRONICA ? 
¿Cóxo queda la conexión al interface? 


Josó Manuel Nuñez Carrillo. 


Te podexos decir que existen bestastes rarcas distirtas aunque las más conocidas son EST, 
PCHL, Technology Research, Silicon Express, Cumana y Hicro Peripherials. Las diferencias 
se suelen centrar was en la interface que llevan de conexiór al Q,.L. que en ellas misaas 
asl por ejemplo la cosercializada por Irvestrónica dejaba bastante que desear sí bien el 
Upgrade de Tcry Tebby Ra solucionado auchos de estes problemas. En U.K. la ads votada tue 
la de Silicor Express. La mayoria de estas [asas iecorgoran en versiones de 5%5 
interfaces arpliación de memoria, zon lo que queda todo más recogido. 

Para la conexión de ampliación en otros abxeros se habla ya de estos texas lExpanderaz 
que pasee doble conector y que puede conectarse a los cenas floppys, si bien el intertace 
queda algc al aire. 


Er España aperas si hay disponible algo de este y es prec:5D pedirlo a U.K. la larita a 
añadir depende de a quien lo pidas en muestras páginas se indican algunas posibilidades. 


Blare 
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AMSTRAD Ye 
SIMELNA ASISTRIAD Y 


Amstrad compra Sinclar. Fue una noticia que nos inquietó a todos desde el momento que 
nos comunicaron que una esiscra de radio la había dado. Nos extrañó aucho a todos y como 
la prensa "especializada" española no decla nada, pensamos que todo habla sido un error, 


Hace algunos dias la noticia era firme e incluso Ricardo Garcia Gete, director 
conercial de Investrónica confirmaba telefónicamente a nuestro presidente que la noticia 
era cierta, pero que Investrónica seguiria distribuyendo Sinclair por algís tiempo, debido 


alos acuerdos firmados con anterioridad a la operación. 


Alan Michel Sugar compra la marca Sinclair en5 millones de libras y los stoks 
existentes en 11 millones. Como primeras declaraciones Sugar dijo que los productos 


Sinclair se beneficiarian de la red de distribución global que posee Ánstrad. 


ánicaserte el desconcierto que de seguro se producirá con los cambios en 


*2arasidlas”: 
PCU 8254 
CPC 6122 


Esta red debe ser maravillosa dentro de Europa, pero realmente por £uropa es muy 
fácil xover algo que se está fabricando aqui; por la parte europea Sinclair no gana nada, 


distribuciones. Teneños que ver la distribución en los U.S.A. la “red global” de Amstrad 
en Estados Unidos; pues bien, Amstrad comienza a vender en el Nuevo Continente hace 
escasazente J meses. Desde el nes de febrero, en el que comenzó a servir sus dos 


¡ Sin embarzoc Sinclair se encuentra en Estados Unidos desde 1981 a través de su 
distribuidor Tiwex. Taspoco parece que gane gran cosa con el "contacto americano” de 


Austrad. 


Ctra curiosa declaración del señor Sugar es que "posiblemente" desaparecerá la gama 
de productos Sinclair y que se lanzará para la campaña navideña un producto que 


coaplesentaria "por debajo” la gama Amstrad. 


Conocezos la gara Amstrad, pero no entendemos que puede haber debajo, realmente no se 
caplean microprocesadores de 2 bits nide 4 bits; que es jo dnico que puede estar por 


debajo de dicha "gama". 
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También es curioso que Mr. Alan piense que el está fabricando ordenadores de empresa 
tes precisa la aclaración de que el aodelo a que se refiere es el PCU 8256). Todos los 
- ordenadores Anstrad Mevan un 2-88, que es un buen microprocesador de 8 bits para regir 
44 Kbytes de memoria, pero es muy malo para gestionar varios cientos de Kbytes; de hecho 
todas las corpañtas serías han abandonado este aicro y están trabajando con micros de 16 
(Conodore Aniga, Atari 528 ST, 1948 ST, Sinclair ML...) 


Poco más cabe decir, porque de poco sás hos hemos enterado, si cabe recordar el atán 
de Sir Clive por abandonar la gerencia de la empresa PR Junio del año pasado, cuando dijo 
*yo no soy la persona adecuada para la gerencia”. 


Sir Clive no es un hombre de negocios, no entiende de dínero, sblo entiende de 
innovación tecnológica, de adelanterse a su tienpo, de apurar al máximo las posibilidades 
tecnológicas del momento. Asi y por este camino nos sorprendió con el 2XB4 a comienzos del 
año 85, con el ZX81 en marzo del 81, con el 2X Spectrun en abril del 82 y un poquito más 
cerca con el QL; *el Salto Cuántico”. 


Tambibn hay que recordar aqui la pantalla plana que incorporó en la televisión de 
bolsillo. 


A — .-- A A 


Los resultados econóxiscs de Sinclair han sido verdaderamente extravagastes, ya que 
| entre el 82 - 8] arroja un beneficio de más de 14 millones de libras, en sl ejercicio 
siguiente la expansión fue doy ESc<Sa, pese al crecimiento de las ventas; fueron unos 
beneficios de algo mesos de 14,3 millones de libras. El periodo marzo 84, y marzo 85 fue un 
verdadero record, Sinclair 3cnsizo2 perder 18.3 millones de libras, ¿230 verdaderamente 
postertoso, teniendo en cuerta la tendencia de beneficios de los años anteriores. 


Sin embargo henos de tener en cuenta Que en este momento es cuando se producen 
fuertes gastos y los ingrests s:zuen siendo más n menos los mismos. En este tiempo se 
ccrjenza a coxercializar el (5, el coche eléctrico de Sinclair Veh:ciesj se crea la 
compañta independiente YSI para el estudio de la alta escala de integración, zonta en la 
universidad e Strathdycie una red de 8L (m5 0 Renos 1 por alumno), destinados a 
investigar en el campo de la inteligencia artificial. También en este perizdo se está 
desarrollando el “dater-Drive", cuyo proyecto completo cuesta en torsc a tos 59 millones 
de libras, Com tangos gastos, la política de ventas de Siaclair tiene que ser muy 
agresiva, y consigue una participación en el mercado inglés de un 6£%, pero ello no le 
logra sacar de la ruina ecosbsicaj demasiados gastos en investigación. 


Alan Michel Sugar no es un cie-tifica, no entiende de tecnologia, sblo de dinero. 
Sugar es capaz de vender ruedas cuadradas, nada importa la calidad del producto, es 
necesario venderlo, y de eso sl que sabe. 
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; Los ordenadores que vende Sugar son innovadores, o mejor, serian innovadores si nos 
encuntrásenos en 1983, pero estamos en 1986 y ao podemás decir que haya inventado dana, 
que ha hecho un *689*, cuando la tecnologia permite hacer un "Ferrari". 


Ha tenido este hombre bastantes negocietes y todos ellos parece ser que le han ido 
bien, pero, desde luego, ninguno tan bien como el ditimo. 
Después de todas estas cosas nos queda, todavía, preguntas Como! 


- ¿Qué será del espiritu innovador de Sinclair después de la cospra?. 


- ¿Será cierto que piensa “cargarse” don Alan Michel la gana Sinclair y ponerle un cassete 
pegado (como el 468) a alguno de los Spectrum? 


- ¿guien se gastaria 11 millones de líbras en stooks para acabar con un acdelo? 


- ¿Qué será de la cartera de proyectos en marcha que tenia Sinclair y sobre toda con el 
Vater-Drive? 


- ¿Podrá acabar el Señor Michel con la inquietud que ha producido 16 *2X 
Nicrofairs*, miles de programas, cientos de periféricos y villones de páginas impresas.? 


Algo sí está claro, Sir Clive está en vida en la historia de la difusión informática, eso 
no podrá evitarlo el tio Michel. 

De cualquier forma so podemos decir otra cosa que bienvenido sea don Nichel "azucar" 
si hace las cosas bien, lo cual es verdaderamente díficil, porque es algo que no le 
interesa. Sólo quiere vender. 


FLASH . . + FLASH... ; 

Leon Meller, presidente de QUANTA, pregunto a Alan Michel Sugar, presidente de 
Anstrad, acerca de cuales eran sus planes respecto al futuro del QL, y que si estaria 
dispuesto a vender los derechos de fabricación del BL a “cualquiera”. Sugar contestó que 
“le harta feliz el poder venderlos”, pero que por el momento aún ao conocian la máquina, y 
que prisero la iban a estudiar. 

Leon Heller comenta, que aunque Anstrad deje de lado el QL, el 0lL seguirá 
fabricindose. 
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Con el programa QUILL suministrado por PSION no es posible la realización de varias 

copias de un mismo docusento conc ao sea usando una y otra vez la opción de impresión con 

la que esto implica si deseamos obtener una cantidad respetable de copias. 

Este problesa es solucionable facilmente si usamos la opción de ispresión ofrecida por 

QUILL en lugar de dirigirla a impresora lo hacemos a un fichero de nic>odrive en esta 
situación se obtiene un +ichero terminado con _lis que está preparado para volcario a 
Impresora en el momento que lo deseemos asi seria factible construir un programa en 
SuperBasic que controlase el volcado de este Hichero a impresora tantas veces CODO se 
desee, 
El Fichero tratado asl por QUILL incluye todos los cótigos de control que tengamos en 
suesteo INSTALL salwo los raracteres castellanos. Los que posean el %.L. castellano 
solucionarian este problema incluyendo el comando TRAL. 


Ahora bien en el caso de izprimir muchas veces un mismo documento Supone una perdida 
excesiva de tienpo para el usuario por lo que he hecho esta rutina que se encargaria de 
| kacer todo lo anteriormente expuesto pero en multitarea con lo que podemos aprovechar asi 
i an tienpo de proceso que en otro caso se perderia. 


Es posible imprimir no sólo ficheros de QUILL sino textos D listados tratados con otros 
editores cono pueden serlo el de Metacoaco o Sinclair, Los ficheros obtenidos de QUILL 
¡ con la opción IMPRIMIR EN FICHERO, que es el tipo aceptado por el programa, llevan una 
| palabra al comienzo del fichero a modo de indicador esto se testea en la zona etiquetada 
¡ coso CICLO. 


El programa permite la impresión de caracteres castellanos para ello se han” construido 
dos tablas paralelas una correspondiente a los códigos correspondientes en el Q.L. y otra 
correspondiente a los que se imprimirán, aparecen etiquetadas por ACENT y NACENT el 
proceso de comparación se realiza a partir de la zona etiquetada BIFURCAR donde se 
recorre la tabla para buspar si coincide el carácter en curso con los de ella y en cada 
caso se pasa a DOBLEA, DOÉEB, DOBLEC y DOBLED que es la que eva el caracter a imprimir 
ab 


A cosenzar se procede a la apertura de una serie de ventanas en pantalla la prinera nos 
sirve exclusivanente para colocar el sombreado, las dos siguientes se refieren al noabre 
! del prograza y la salida de consola asociada al job. Si se produce un error en la 
apertura de ventanas el mensaje de error correspondiente se generará por el canal 0, se 
da la opción de corregir el error producido y tecleando Fl se reanudará la ejecución del 
programa. 
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Posteriormente se nos pregunta el fichero a imprimir en caso de cualquier error se 
produce un mensaje en la ventana del job, ver que en este caso se decidió no testear el 
dispositivo de entrada de forma que puede ser mdv, $lp, ser2, net o pipe con lo que el 
vivario deberá de usar únicamente aquel medio que sea legitimo en cada momento. 


Seguidamente se nos ¡interroga acerca del número de copias a realizar y núnero de laeas 
por página de forma que debemos conocer este dato antes de llamar al programa. 
Posteriormente se pregunta si se va a usar papel continuo pn0, en el caso de que se 
responda que si deberemos indicar después el número de liaeas entre páginas, ver que esta 
opción pudiera no ser necesaria si ya se indicó al formatear el texto con QUILL pero por 
si esto no se realizó se decidió incluir esto. 


Posteriormente en la zona etiquetada cono SIMP se procede a abrir la salida serie en el 
caso de que no sea posible por estar en uso es posible corregir el error desde Basic 
Icerrando el canal que tengamos abierto) y pulsando Fl se reinicia el proceso. 


Al tinalizar el proceso se nos indicará la posibilidad de imprimir otro fichero en caso 
de no desearlo se procede a cerrar todos los canales y a liberar al 0DOS del job. 


Ver que en el caso de querer abortar el programa se debe de pulsar ESC, esta tecla se Ja 
testea constantemente durante la impresión por lo que no se deberá usar en el desarrollo 
de los otros prograsas que se ejecuten en multitarea con este job (Superbasic) Jo mismo 
se puede decir de Fl cuando el programa está testeando errores en la apertura de canales. 


El proceso de testeo del teclado es algo a lo que no nos habiamos referido en ocasiones 
anteriores y su explicación deja bastante que desear en el manual de Adrian Dickens el 
formato de llamada se puede observar por ejemplo en la zona etiquetada como cero en las 
subrutinas de error donde A3 apunta al bloque de definición, he usado dos bloques uno 
para cada una de las dos filas que se exploran asi el primer byte incluye el comando 9 
gue indica teclado, el segundo byte tora el valor 1 ya que no se le va a mandar nada, la 
palabra larga siguiente está puesta a 0 ya que no se manda ningún parámetro, el siguiente 
byte se refiere aj núaero de tila a testear y el último byte indica que se espera una 
respuesta de 8 bits, 


En la redacción del programa se han usado las macros 0005, FIN, INPUT y ESCRIBIR que son 
Jácilrente usables es otros programas si se pretende hacer ejercicios con los comandos 
que se tratan en la sección de código máquina ya que para cualquier trabajo que se 
realice es preciso mantener informado al 0DOS. 


Se incluye también un cargador de código para aquellos que no deseen teclear todo el 
listado de ensamblador. 
> 
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400 dndcloRESPRISOSA) 280 cont=cont+4 
110 tempdirsinicio 290  adirsadir+2 
120 FOR fsl 10 47 300 END FOR r 
130 intro 310 INPUT checksun 
340 END FOR € 320 IF checkschecksua THEM PRINT 'correcto'<EXIT aintro 
150 SEXEC mdv2_multimp_bin,inicio,1854,500 330 tempdir=adir 
160 STOP 340 END REPeat ajntro 
170 DEFine PROCedure intro 330 END DEFine 
180 REPeat aintro 360 DEFine Fuliction hexdec (hex$) 
190 check=0 370 dec=0 
200 cont=1 300 FOR asi TO LEN(hex$) 
210 adirstempdir 390 LET v=CODE (hex8(a)) 
«220 INPUT ahex$ 400 1F v)44 THEN vzv-39 
230 FOR r=4 TO 20 310 1F v)47 THEN v=v-48 
240 bhexf=ahexSicont TO cont+3) 320 dec=dec+2*1(LENIhexS)-0)+4)4v 
250  un=hexdecibhex$) 430 NEXT n 
240  POKE_W adie,dec 440 RETurn dec 
270 checks check+dec 450 END DEFine 


1 *SOLBODO0O0004AFDODOFADSSACIAAI2DAPADSOI24I53494F4EOO72FF7440700384E4149FA070872FF' 335779 
2 '760241FAO4CE70014E42802CO0000000870661000485609A720078FF43FAO548702E4E437200765F* 406732 
3 '43FRO544702E4E4370024E4243FA0518247800084E92808C0000000067066100045260E929480000”, 301607 
4 7020454374 1576FF43FAOSAS70074E4343FA04F8347800C64E92B0BCO00000006706610004264028' ¿351203 
5 '288870204E43740976FF43FAD63270074E4347FA04FA43EB0002742470024E43927C0001368122FF* 383408 
A "760041FAOAE270014E42503C0000000057082054610003BE60C029480004205474FF70204E437412*, 355273 
7 "?6FF4IFAOSDO70074E4347FA04B243EB0002740470024E43927C000136816100041AB07C000066CE*, 362335 
8 "DO7CFFFFE7COAIFAOS1C3204205476FF70204E43741974FF43FA04DO70074E4347FA047443ED0002", 423194 
9 "740370024E43927C000136816100030CB07CO0O066CEBBICFFFFA7COD82CO00145FAO5DC14842054>, 454874 
10 *205478FF70204E43741676FF43FA054070074E4347FA042043EB0002740170024E43927C00013681*,381866 
11 *43FAO41EASFAO5A4121114810C110053570000180C110073670000100C11004E67400011008£673A*, 166064 
12 *60AE76FF70204E43741D76FF43FA040270074£4347FA03E043EB0002740370024E43927C00013681>, 398159 
13 '61000348807C000066D045FA054E1544000172FF760241FA051470014E42B03C0000000067142054” , 328349 
14 *76FF7OZ04E43740078FF42FA03E070074E436100028060D229480008720D76FF70054E43206C0004* , 333992 
15 *78FF70014E43B220001B5708720070424E436006720270424E4370014E43206C0008BOBCEFFFFFFS',565021 
16 '670000EC45FAOAEOB23CO00A666C062A00010001142A0001B41267026050157C0000000143FA04BC" 245619 
17 *0C11006E870C0C11004E67066100027A6040720D76FF70034E43205470204E49741076FF43FAO3D?, 353183 
18 *70074E4347FA030043EB0002740170024E43927C0001368143FA02EE0C11005267080C1100736702* ,292431 
19 *6OCAASFAO43EA7FAD4A67ADOB21A670A5245BA3CODOCASFIGO4OBA2CODO4AF2ABA7COOOT67082A7C?, 484310 
20 '00074F106028727870034£43720970054E436014722070054£43720870054E436000722770054E43" 491947 
71 "720870054E431233500070054E4347FA026E70114E410901000366000126206C00046000FFOG43FA” , 363551 
22 *03FA137COOO0O0014IFAOIEADAS1O0O10C51FFFFGGODODAS205478FF70204E4374 1F76FFA3FAO266', 286163 
23 *70074E4347FA023843EB0002740170024E43927C0001368143FA022612110C110053670000180C11*,270187 
24 *0073670000100C11004E672A00 11004E67246084205470024E42208£000470024E42206C00087002*,261413 
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23 '4E42206C000070024E426000FC4E70204E43741E76FF43FA026870074E43205470024E4220800004" 407166 
28 *70024E422060000870024£42205C000070024E42780072FF20054E4143FA03340C110073574C0011?,322060 
27 *00534746720D76FF70034£43205478FF70204£43741D76FF43FA025070074E4347FA017043EB0002*, 385462 
29 '740170024£4392?C0001368143FA01SA0C1100534700FDBEOC1100736700FDD660C66)0000AC 4000”, 411062 
29 *FDCC7ÉFF205470204E43741E76FF43FA01EC70074E43205470024E42206C000470024E42206C0008”, 401551 
30 *70024E42208C000070024E4272FF760070054E41347800CC20544E92740C79FF43FA017270074E43", 382768 
31 *47FA00F470114E4108010001660260F04E753478000C20544E92740076FF43FA014C20074E4347FA" , 327528 
32 *'00CE70114E4108010001640260F04E752054741176FF43FAOIF870074E4347FA00A670114E410801*,326428 
33 *000370F14E7580EE14290001BA3C00FFS200FD1A206C000876FF720D70054E43720470054E4351CD", 435133 
39 *FFF241FA0082720170003810987C0001670C987C0001C2FCOO0ASICEFFFAJALB9A?CO00178001018* 484862 
35 *907C00306D00FF92807C00098E00FFSACOCIDB8082FCODOA700051CDFFE2987C000170004E75F801*, 473846 
36 *020000F9001401000000F801020000F900280100001400F40007000A003C0005003200F9000A0901?, 58543 
37 "00000000010209010000000000020000000000000000000000000000000000000000000000000000' ,2565 
38 "00000000000000000000000034446573456120696D7072696D6972208F74726F206669626865726F* , 370019 
39 '3F3A200053616C69646120736572696520006E756D2E206465206C936E65617320706F7220706167” , 410106 
40 '2E3A2000483120636F6E74696E7561724D3540544920494D50524553494F4E20202031 2E3000452F*, 342560 
41 "5320636F6D706045746164612E2046696E2044652074726162616A6F452F5320696E636F6D706C63", 478938 
42 "74612C2070726F672E2061626F727461646F496E74726F647374636120686F646120792070756C73', 501047 
43 * 652020207334 20004E996D65726F204465206C936E65617320656E747265207061672E3A20005061*,404102 
44 *70656020536F6E74698E756F2028732F 6E293A204E996D65726F20646520635F7069617334204669" 471722 
43 *636865726F3420004E996D65726F20696E638F72726563746F0000105343525F3235365837304132*,413753 
46 '35365830000453453231809393959987A808B4B39896163696F7575436359585C2C000000000000* ,471239 
47 *000000000000000000000000000000000000000000000000000000000000V00000000DV0V00V000” 0 


4 Este programa pernite la impresión varias veces de un fichero QUILL 


4 Por Isidro Asta (c) 1986 Isidro Asia 
$ Macro definiciones 


10_OPEN EQU 1 

10_CLOSE EQU 2 0 MACRO 

So_FILL EQU sE MOVER 311,30 
10_FBYTE EQU 1 TRAP 312 
10_SBYTE EQU 5 ENDA 

10_.FLINE EQU 2 FIN, MACRO 

10_SSTRG EQU 2 MOVE.L 144),A0 
SD_CLEAR 11) s20 19703 10_CLOSE,2 
NT_FRIOB EQU 5 MOVE,L 41A4), AO 
BT_IPCON Equ sii : años 10_CLOSE,2 
ET_PRIOR Eau $0) HOVE.L 8144), 40 
UT_ERR EU sec años 10_CL0OSE,2 
UT_CON EQU sé HMOVE,L + 12144) ,A0 
UT_SCR (30 $8 030s 10_CL0SE,2 
FS_POSAB EQU $42 : ENDA 


<< Azuqi-i-iu=ia--_-áAÁKÁ<_K_--- E _ZQ za. AA 


O o  ——— —— 


ESCRIBIR MACRO 
MOVER 
MOVER 
LEA.L 
Bos 
ENOM 

INPUT MACRO 
LEA.L 
LEA,L 
HOVEO 
ados 
SuB 
HOVE.Y 
ENDM 


iPrograma principal 


BRA.S 
DS.L 
DC.V 
D.y 
Dd.) 


RUTINA MOVER 
MOVES 
ADOS 
LEA,L 
MOVER 
MOVER 
LEA.L 
9nos 
CMP.L 
BE0.$ 
.BSR 
BRA.S 

st MOVER 
MOVER 
LEA.L 
9105 
MOVES 
MOVER 
LEA.L 
8305 
9305 


$81 


1,2 
1-1,03 
12,M 
10_SSTRG,3 


BUFFER, AG 10 
2143),AL 

1:22 

10_FLINE,3 

11,01 

D1, (M3) 


*HULTI- IMPRESION? , 0 


31,4 
164,32 
MT_PRIOR, 1 
10,4 


ERRORO VUERI 
RUTINA 
90,1 
4-1,03 
BLOCKI,AL 
SD_FILL,3 
do,DL 
$-1,03 
BLOCK2,A1 
SD_FILL,3 
10_CL0SE,2 
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LEA.L 
HOVE.Y 
ISR 
CNP.L 
BE0.$ 
BSR 
BRA. S 
MOVE.L 


aÑos 
ESCRIBIR 
LEAL 
MOVE. Y 
JSR 
CNP.L 
BE0.S 
BSR 
BRA, S 
MOVE.L 


dos 
ESCRIBIR 
INPUT 
MOVER 
MOVEO 
LEA,L 
aros 
CNP.L 
3E9.S 
MOVE.L 
BSR 
BRA.S 
NOVE.L 


MOVE.L 
HOVEO 
a30s 
ESCRIBIR 
1NPUT 


VENTA, AL 


20,121M4) 


SI_CLEAR,3 
21, MENS 
VENT2,A1 


SI_CLEAR, 9 
9, MENS 

34 

3-1,D1 
30,33 
BUFFER, A0 
10_0PEN, 2 
30,30 

s 
244),40 
ERROR 
VUERO 
M,4144) 


(242,40 
3-1,09 
SD_CLEAR, 3 
18,MEN2 

4 

RUTCON 
30,90 
VUERL 
1-1, 
VUERL 
NUMREP,AL 
14,141) 


€_m——— _——_—_ _—_—_—J— ————_————— ————— 


ESPINP 


CIINP 


NIP 


HOVE.L 
MOVER 
Bros 
ESCRIBIR 
TNPUT 
BSR 
che 
BNE.S 
HP 
BEQ.$ 
ADD 
LEA.L 
MOVE.B 
MOVE.L 


MOVE. L 
HOVEA 
Q30s 
ESCRIBIR 
INPUT 
LEA.L 
LEA.L 
MOVE.D 
MOVE. B 
ENP1.B 
BER 
CNPI.D 
BE0 
CMP1.2 
BER. 9 
CHP1.3 
BE9.5 
BRA.S 


MOVER 
anos 
ESCRIBIR 
INPUT 
BSR 

CNP 
BNE.S 
LEA.L 
NOVE.B 


144),A0 
4-1, 
SD_CLEAR, 3 
25, RENLO 
3 

RUTCON 
30,20 
ESPINP 
1-1,D4 
ESPINR 
11,54 
CLIN,A2 
94,12) 
144),40 


144),A0 
8-1,D3 
SI_CLEAR,3 
22,MEN3 

1 
DUFFER+2,A4 
LINEAS, A2 
(41),D4 
31,142) 
303, (41) 
MINP 

HIS, (AD) 
MINP 
178,141) 
sin 

3110, 141) 
SIN 

CIIMP 


4-1,3 
SD_CLEAR,3 
29, HEN4 

3 

RUTCON 
30,30 

KIM 
LINEAS, AZ 
M,1142) 
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SINP 


s10 


cIeLo 


s12 


REPETIR 


MOVER 
MOVES 
LEA.L 
Q30s 
CAP. 
2E0.S 
MOVE.L 
MOVEO 
aos 
ESCRIBIR 


BNE.S 
11519] 
MOVE.B 
ENP.J 
BE0.S 
BRA.S 


Y-1,51 
12,03 
IMPRESORA, A0 
10_0PEN,2 
30,00 

sLO 
141,40 
11,9 
SD_CLEAR, 3 
19,NENIA 
ERROR 

SIMP 
M,81M4) 
900,01 
11,03 
10_SBYTE,3 
4104),A0 
1-1,03 
10,FBY1E,3 
E919,D1 
$12 

10,5 
FS_POSAB, 3 
REPETIR 
nn 
FS_POSAB,3 


10_F3YTE,3 
81441,40 
3-10,00 
ACABAR 
CLIN,A2 
3404,31 
DIFURCAR 
11,142) 
1482), D2 
182),D2 
1PAG 
BIFURCAR 


1PA6 MOVE. 8 


TIPAD MOVER 


MOVE. L 
ATESTEO 
ads 
ESCRIBIR 
INPUT 
LEA.L 
CHP1,B 
BEB.S 
CNPI.B 
BEQ.S 
BRA.S 


BIFURCAR LEA.L 
LEA.L 
MOVER 

COMPARAR CiP.3 
BE9.S 
AMO 
CNP.3 
BNE.S 
BRA. $ 


ÍOBLE Cup 
BLE.S 
CNP 
BEQ.8 
CHP 
BLE.S 
BRA.5 


30,1142) 
LINEAS, AJ 
3L10,(A1) 
JIPAS 
08,141) 
HIPAG 
SCONT 
BIFURCAR 
350D,D1 
1-1,3 
10_SBYTE,3 
144),40 


SD_CLEAR, 3 
29, MENS 
1 


DUPFER+2,M1 
1533, (41) 
DIFURCAR 
1973, 1A1) 
BIFURCAR 
ATESTEO 


ACENT,A2 
MACENT¿A3 
10,05 
(421+,D4 
DOBLE 
1,35 
42,5 
COMPARAR 
SIMPLE 


14,95 
DOBLEA 
85,05 
DOBLES 
2,5 
DOBLEC 
DOBLED 


JORLES 


MOLEC 


DOBLEA 


MOBLES 
SIMPLE 


ACAJAR 


MOVER 
ByOs 
MOVER 
ados 
BRA. $ 


MOVEA 
BdOS 
MOVER 
2105 
BRA.S 


NOVEO 
2003 
MOVER 
ados 


aos 
LEA.L 
ados 
BTST 
BNE 
MOVE.L 
BRA 


LEA.L 
MOVE. D 
LEAL 
SUBI. Y 
CNI 


3123,D1 
10_SBYTE,3 
30,24 
10_SBYTE,3 
DOBLE) 


144,04 
10_SBYTE,9 
10,31 
10_S3YTE,3 
DOBLED 


1827,31 
10_SBYTE,3 
18,D 
10_6DtTE,3 


0143,93.4),D1 


10_SRYTE,3 
ENTER, A3 
MT_IPCON, 
12,31 
ABORTAR 
4144), 40 
REPETIR 


CLIN,A1 
30,114) 
AUMRER,A1 
BL, (A1) 
3-1,(A1) 
MIRAR 


e ———————A AN 


DTRAV 


OTRA 


NODTRA 


MIRAR 


NOVE.L 
HOVER 
e10s 
ESCRIBIR 
INPUT 
LEA.L 
MOVE. B 
CMP1.B 
BER 
CNP1,B 
BEN 
CNP1.B 
BED.S 
1,38] 
BEQ.S 
BRA.S 


FIN 
BRA 


anos 
ESCRIBIR 
FIN 
MOVER 
HOVER 
eyos 
LEA.L 
CUP1.8 
BE9.S 
CNP1.B 
BEQ.S 
MOVER 
MOVES 
B30S 
MOVE.L 
MOVES 


144),80 
3-1,03 
SD_CLEAR,3 
31,MEK12 

1 
RUFFER+2,A1 
1443,D1 
199, (41) 
OTRA 

2115, 1M1) 


$110, 141) 
NOOTRA 
OTRAY 


RUTINA 


SD_CLEAR,3 
30,MEN7 


10,13 
41,0 
MT_FRJOB,1 
LINEAS, AS 
115, 141) 
CONTINUO 
163, (41) 
CONTINUO 
1809,24 
41,3 
10_SBYTE,3 
144),40 
1-1,09 
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TESTEO 


CONTINUO 


ABORTAR 


Hubrutinas de 


ERROR 


SALITRE 


eos 
ESCRIBIR 
INPUT 
LEA.L 
CNP1.B 
BER 
CMPT.B 
BEQ 
BRA.S 


MOVEO 
MOVE.L 
añ0s 
ESCRIBIR 
FIN 
MOVED 
HOVEO 
anos 


error 


NOVE.Y 
NOVEL 
35 
ESCRIBIR 
LEA.L 
en0s 
BTsT 
BNE.S 
BRA.S 
RTS 


NONE. Y 
MOVE.L 
JSR 
ESCRIBIR 


SI_CLEAR, 3 
29,MENS 

1 
JUFFER+2,A1 
4953, (41) 
CICLO 

1973, 145) 
cicLo 
TESTEO 


SCONT 
CICLO 


1-1, 
144),A0 
SD_CLEAR,3 
30, MENA 


9-1,01 
30,33 
MT_FRIOB, 4 


UT_ERR,A2 


12,MEN9 


€ == > 4 1 - [AA rr 


CERO LEA.L FUNC,A3 
9005 NI_IPCOR,1 
BTST $,D1 
BNE.S SALIRCO 
BRA.S CEROO 
SALIACO RTS 
ER! MOVE.L 1A8),A0 
ESCRIBIR 17,MENER 
CER! LEAL ENTER, A3 
BOS N_IPCON, 
BIST 1D 
MOVES 8-15,D0 
RIS 
BRA.S CERI 
DIRA DMA,PRO 
Hubratina de salto de pas. CONVERS MOVE (40)+,D5 
suB 21,05 
SCONT KOVE.B 10A1),D5 MCUEO 30,4 
CMP.3 11,05 BUCLE MOVE. B 140) +, DO 
BEQ CICLO su 148,00 
HOVE.L B1A4),A0 BLT.L ERI 
HOYE9 1-1,03 CAP 15,00 
SALTOS HOVEO 850D,D1 B6T.L ERI 
9305 10_SBYTE,3 MULU 21,00 
HOVEO 1804,D1 AD.L D0,D4 
BreS 10.SBYTE,3 DIV 310,D 
DIRA Ds. SALTOS MOVES 10,DO 
DIRA D3, BUCLE 
Wubrutina de conversióe SUB 31,94 
MOVER ñO,DO 
RUTCON LEAL BUFFER, A0 RTS 
BOVER 1,1 
MOVEO 10,00 
MOVE 140),D4 
su 13,34 
BEa.S CONVERS 
SUB 31,04 
PRO HULU 110,01 


A  —_— «—— 2 A 


A ——— A ———————— 


HEspacio de datos 


VENTA 
VENT2 


BLOCK! 
BLOCK2 
ENTER 


FUNC 


JUFFER 


MENI2 
NENA 
NENIO 
HENO 
MENO 
MEN 
MEME 
HEN 
MENA 
MENA 
MENZ 
NENI 
MENER 
VENTO 


IMPRESORA 


K.B 
DC.y 
D.B 
DC.Y 
»C.Y 
DKC.V 
DX.B 
DC. 
DC.B 
».B 
DC. 
DC.3 
DS.y 
DS.B 


»C.B 
D.B 
».B 
x.B 
d.B 
»C.B 
Dc.B 
»x.B 
DKC.B 
DX.8 
DC.B 
DC.3B 
».B 
DdC.4 
DC.3 
DC.V 
Dt.3 
».B 
D.8 
DS.P 
DS.B 
DS.B 
DC,B 


END 


248,1,2,0 

249,20,256,0 

248,1,2,0 

249,40,256,20 

244,7,10,60 

5,50,249,10 

91 

0 

2 
1 


']Desea imprimir otro fichero?: *,0 
'Salida serie *,0 

'nun. de liaeas por pag.: ”,0 

*Fl continuar* 

*MULTI- IMPRESION  1.0*,0 

'E/S cospletada, Fin de trabajo' 
*E/S incompleta, prog. abortado' 
*Introduzca hoja y pulse 5: *,0 
'Nónero de lineas entre pag.: ',0 
"Papel continuo (s/a); * 

'Nesero de copias; * 

*Fichero; ',0 

*Ndzero incorrecto',0 

14 

*5CR_256X704256X0* 

4 

'SERI' 

$80 ,$83,$93,$96, 599,487, $A8, $89, $84, $B3, $49, 489 
$61,$65,567, 664,75, $75, 67,99,93,91,92,124 
16 

2 

2 

2 
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AOAPICACIONES 


RENMOVACION DE LA CONDICION DE SOCcIS 


El próximo mes de Junio finaliza ej plazo de abono de aquellos socios que se 
suscribieron al Club para el primer semestre del año. Dichos Socios, si desean seguir 
pertereciendo Blave, deberán renovar el abono de la cuota, para el segundo sexestre del 
año. 


La renovación puede realizarse enviando un giro postal al tesorero del Club 
findicando en la parte del miszo destinada a texto, el número de socio, nombre y 
apellidos, asi como la palabra *RENOVACION*), o enviando un Cheque junto con el número de 
socio, nombre y apellidos, 

El importe de la cuota para los meses de Agosto a Diciembre es de 1.368 pts. 


(0s recordaos que al no tener aún un número de sociedad en el registro de 
asociaciones, no podemos abrir una cuenta bancaria a nombre de Olave, por lo que tampoco 
podemos cobrar talones o 9'ros a dicho nombre; por ello deben ir a nombre del tesorero! 


Las renovaciones de cuotas deben enviarse antes del 31 de Junio. Se entenderá que 
aquellos socios, abonados para el priver seuestre del año, que no renueven la cuota, 
manifiestan su voluntad de causar >aja en el Club. 


Esto men han entrado a dornar parto de la libreria los siguientes programas: 


£.- Recibos de navidad ; longitud: 5282 bytes. 
%.- Regresiones H longitud: 6250 bytes. 


También son accesibles por libreria todas las rutinas que se publiquen en el boletin 
en la sección del mismo nombre. 


El programa Recibos de navidad se encarga de la confección de este tipo de recibos y 
la obtención de una copia impresa de los mismos. En esta misma sección se puede ver una 
duestra de sus resultados. 


El prograza Regresiones se encarga de realizar el ajuste de una aube de puatos a UR 
función lineal, exponencial o logaritmica por los métodos tradicionales en estos rasos. 


hn 


43. 
44. 
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SUMAGO 


PORTADA 

INFORMACION SOBRE EL CLUB 
EDITORIAL 

COMENTARIO DE PROGRAMAS 
QHON 


COMWARE TOOLKIT 

HARDVARE 

INTRODUCCION AL €. MAQUINA 
CORREO DE LOS SOCIOS 
NOVEDADES 

PREGUNTAS 

AMSTRAD VS SINCLAIR 
TRUCOS Y RUTINAS 


MULTI - IMPRESION 


NOTIFICACIONES 
SUMARIO 


